home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / os2 / dialip10.zip / NOTIFY.CMD < prev    next >
OS/2 REXX Batch file  |  1996-11-18  |  797b  |  42 lines
  1. /**/
  2.  
  3. parse arg messages
  4.  
  5. bs   = '08'x
  6. ff   = '0c'x
  7. cr   = '0d'x
  8. esc  = '1b'x
  9. crlf = '0d0a'x
  10.  
  11. tmp = value( 'TMP', , 'OS2ENVIRONMENT' )
  12. msg_file = tmp'\msg_file'
  13.  
  14.  
  15.     if ( stream( msg_file,"c",'query exists' ) \= '' ) then
  16.         DO
  17.         'del' msg_file
  18.         END
  19.  
  20.     text = 'You have' messages 'messages.'
  21.     rc = lineout( msg_file, text )
  22.  
  23.     rc = stream( msg_file,"c","close" )
  24.  
  25. 'start epm' msg_file
  26.  
  27. do c = 1 to 5
  28.     call notify_audio
  29.     call syssleep 45
  30. end /* do */
  31.  
  32. 'exit'
  33. exit
  34.  
  35. /*************************/
  36. notify_audio:   /* play.cmd would be in like x:\mmos2 after you install multimedia */
  37.         call play 'file="f:\cmds\notify.wav"'
  38.         call play 'file="f:\cmds\notify.wav"'
  39.         call play 'file="f:\cmds\notify.wav"'
  40. return
  41.  
  42.